package com.lky.marshallmall.product.service.impl;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.JSONObject;
import com.alibaba.fastjson.TypeReference;
import com.lky.marshallmall.product.service.CategoryBrandRelationService;
import com.lky.marshallmall.product.vo.Catelog2Vo;
import org.redisson.api.RLock;
import org.redisson.api.RedissonClient;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.cache.annotation.CacheEvict;
import org.springframework.cache.annotation.Cacheable;
import org.springframework.cache.annotation.Caching;
import org.springframework.data.redis.core.StringRedisTemplate;
import org.springframework.data.redis.core.script.DefaultRedisScript;
import org.springframework.stereotype.Service;

import java.util.*;
import java.util.concurrent.Executors;
import java.util.concurrent.LinkedBlockingDeque;
import java.util.concurrent.ThreadPoolExecutor;
import java.util.concurrent.TimeUnit;
import java.util.stream.Collectors;

import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.service.impl.ServiceImpl;
import com.lky.common.utils.PageUtils;
import com.lky.common.utils.Query;

import com.lky.marshallmall.product.dao.CategoryDao;
import com.lky.marshallmall.product.entity.CategoryEntity;
import com.lky.marshallmall.product.service.CategoryService;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;

/*
Spring-cache存在的不足
1.读模式：
    缓存穿透：查询一个null的数据。解决：缓存空数据（配置文件spring.cache.redis.cache-null-values=true）
    缓存击穿：大量并发进来同时查询一个正好过期的数据。解决：加锁  springcache默认不加锁
    @Cacheable 加参数 sync = true
    缓存雪崩：大量的key同时过期。解决：加随机时间
2.写模式：（缓存与数据库一致）
    读写加锁。（适用于读多写少）
    引入Canal，感知mysql的更新 去更新数据库
    读多写多，直接去数据库查询
总结：常规数据（读多写少，一致性要求不高的数据）使用springcache
如果要求很高实时性数据，特殊数据特殊书记
原理：
    Spring->CacheManager->Cache组件->Cache组件负责缓存的读写
    使用的是redisCache
 */

@Service("categoryService")
public class CategoryServiceImpl extends ServiceImpl<CategoryDao, CategoryEntity> implements CategoryService {

    @Autowired
    private CategoryBrandRelationService categoryBrandRelationService;
    @Autowired
    private StringRedisTemplate redisTemplate;
    @Autowired
    private RedissonClient redisson;

    @Override
    public PageUtils queryPage(Map<String, Object> params) {
        IPage<CategoryEntity> page = this.page(
                new Query<CategoryEntity>().getPage(params),
                new QueryWrapper<CategoryEntity>()
        );

        return new PageUtils(page);
    }

    @Override
    public List<CategoryEntity> listWithTree() {
        //查出所有分类
        List<CategoryEntity> categoryies = baseMapper.selectList(null);
        //组装成父子的树形结构
        //1.查找所有一级分类 父id = 0
        List<CategoryEntity> level1 = categoryies.stream().filter(categoryEntity ->
                categoryEntity.getParentCid() == 0
        ).map((menu) -> {
            menu.setChildren(getChildrens(menu, categoryies));
            return menu;
        }).sorted((menu1, menu2) -> {
            return (menu1.getSort() == null ? 0 : menu1.getSort()) - (menu2.getSort() == null ? 0 : menu2.getSort());
        }).collect(Collectors.toList());
        return level1;
    }

    @Override
    public void removeMenuByIds(List<Long> asList) {
        //TODO   .检查当前删除菜单，是否被别的地方引用
        //物理删除
        baseMapper.deleteBatchIds(asList);
        //逻辑删除

    }

    /**
     * 找到catelogId的完整路径
     * 【父/子/孙】
     *
     * @param catelogId
     * @return
     */
    @Override
    public Long[] findCatelogPath(Long catelogId) {
        List<Long> paths = new ArrayList<>();
        List<Long> parentPath = findParentPath(catelogId, paths);
        Collections.reverse(parentPath);
        return parentPath.toArray(new Long[parentPath.size()]);
    }

    /**
     * 级联更新
     *@CacheEvict:失效模式
     * @param category
     */
    @CacheEvict(value = {"category","product"},
    key = "'getLevel1Categoies'")
    //删除模式 多个缓存
//    @Caching(evict = {
//            @CacheEvict(value = {"category","product"},
//                    key = "'getLevel1Categoies'")
//            @CacheEvict(value = {"category","product"},
//                    key = "'catelogJSON'")
//    })
    //删除某个分区下的所有缓存数据
//    @CacheEvict(value = {"category","product"},
//            allEntries = true)
    @Transactional
    @Override
    public void updateDetail(CategoryEntity category) {
        this.updateById(category);
//        if (!StringUtils.isEmpty(category.getName())){
        categoryBrandRelationService.updateCategoryName(category.getCatId(), category.getName());
        //TODO 关联其他冗余字段
//        }
    }

    /**
     * 获取一级分类
     *
     * @return
     */
    //需要缓存的数据，必须指定到哪个名字的缓存中。
    @Cacheable(
            value = {"category"},
            key = "#root.method.name"
//            sync = true
    )   //当前方法的结果是需要缓存的，如果缓存中有则不调用方法，将方法的结果放入缓存
    @Override
    public List<CategoryEntity> getLevel1Categoies() {
        List<CategoryEntity> categoryEntities = this.baseMapper.selectList(new QueryWrapper<CategoryEntity>().eq("parent_cid", 0));
        return categoryEntities;
    }

    /**
     * redisson分布式锁
     * 缓存一致性问题解决
     *  1.双写：更新时redis中的数据也一起更新。
     *  2.失效：更新之后删除redis中缓存数据。
     * @return
     */
    public Map<String, List<Catelog2Vo>> getCateLogJsonFromDbWithRedissonLock() {
        //锁的粒度越细越快。
        RLock lock = redisson.getLock("cateLogJson-lock");
        lock.lock();
        Map<String, List<Catelog2Vo>> dataFromDb;
        try {
            dataFromDb = getDataFromDb();
        } finally {
            lock.unlock();
        }
        return dataFromDb;

    }

    /**
     * redis实现分布式锁
     * @return
     */
    public Map<String, List<Catelog2Vo>> getCateLogJsonFromDbWithRedisLock() {
        //当业务代码超时（redis已经删锁了，第二个线程又拿到一把锁，这时业务代码执行完可能会删很多锁）
        //为了保证删锁不是别的线程的锁，需要加个令牌机制（每个线程有自己的UUID）
        String uuid = UUID.randomUUID().toString();
        //占分布式锁，去redis占坑 （setNX）加过期时间防死锁
        Boolean lock = redisTemplate.opsForValue().setIfAbsent("lock", uuid, 300, TimeUnit.SECONDS);
        if (lock) {
            //加锁成功。。执行业务
            //设置过期时间,如果在设置时间之前突然闪断，相当于没设置还是死锁，所以设置过期时间和设置锁应该是原子操作。
//            redisTemplate.expire("lock",30,TimeUnit.SECONDS); ↑
            Map<String, List<Catelog2Vo>> dataFromDb;
            //防止业务时间过长，redis锁到期。添加try finally块，永远等执行业务完再删锁解锁。
            try {
                dataFromDb = getDataFromDb();
            } finally {
                //利用lua脚本 实现删锁的原子性（redis官方文档提供的设计模式，KEYS[1]是参数args）
                String script = "if redis.call('get',KEYS[1]) == ARGV[1] " +
                        "then " +
                        "    return redis.call('del',KEYS[1]) " +
                        "else " +
                        "    return 0 " +
                        "end";
                //删除锁
                Long lock1 = redisTemplate.execute(new DefaultRedisScript<Long>(script, Long.class)
                        , Arrays.asList("lock"), uuid);
            }
            //获取令牌也是需要io交互的，也会耗时，再获得时锁过期，还是没锁柱。不是原子操作
            /*String token = redisTemplate.opsForValue().get("lock");   ↑
            if (uuid.equalsIgnoreCase(token)) {
                //删除自己自己线程的锁
                redisTemplate.delete("lock");
            }*/
            return dataFromDb;
        } else {
            //加锁失败。。重试   自旋
            //休眠100ms
            try {
                Thread.sleep(200);
            } catch (InterruptedException e) {
                e.printStackTrace();
            }
            return getCateLogJsonFromDbWithRedisLock();
        }
    }

    private Map<String, List<Catelog2Vo>> getDataFromDb() {
        String catelogJSON = redisTemplate.opsForValue().get("catelogJSON");
        if (!StringUtils.isEmpty(catelogJSON)) {
            Map<String, List<Catelog2Vo>> res = JSON.parseObject(catelogJSON, new TypeReference<Map<String, List<Catelog2Vo>>>() {
            });
            return res;
        }

        List<CategoryEntity> categoryList = baseMapper.selectList(null);
        //1.查所有一级分类
        List<CategoryEntity> level1Categoies = getParent_cid(categoryList, 0L);
        Map<String, List<Catelog2Vo>> parent_cid = level1Categoies.stream().collect(Collectors.toMap(k -> k.getCatId().toString(), v -> {
            List<CategoryEntity> categoryEntities = getParent_cid(categoryList, v.getCatId());
            List<Catelog2Vo> catelog2Vos = null;
            if (categoryEntities != null) {
                catelog2Vos = categoryEntities.stream().map(l2 -> {
                    Catelog2Vo catelog2Vo = new Catelog2Vo(v.getCatId().toString(), null, l2.getCatId().toString(), l2.getName());
                    //找当前二级分类的三级分类封装成vo
                    List<CategoryEntity> level3Catelog = getParent_cid(categoryList, l2.getCatId());
                    if (level3Catelog != null) {
                        List<Catelog2Vo.Catelog3Vo> catelog3VoList = level3Catelog.stream().map(l3 -> {
                            Catelog2Vo.Catelog3Vo catelog3Vo = new Catelog2Vo.Catelog3Vo(l2.getCatId().toString(), l3.getCatId().toString(), l3.getName());
                            return catelog3Vo;
                        }).collect(Collectors.toList());
                        catelog2Vo.setCatelog3List(catelog3VoList);
                    }
                    return catelog2Vo;
                }).collect(Collectors.toList());
            }
            return catelog2Vos;
        }));

        //将数据库结果转为json放入缓存
        String res = JSONObject.toJSONString(parent_cid);
        redisTemplate.opsForValue().set("catelogJSON", res, 1, TimeUnit.DAYS);
        return parent_cid;
    }

    //从数据查询并封装分类数据（本地锁）
    public Map<String, List<Catelog2Vo>> getCateLogJsonFromDbLocalLock() {

        //解决缓存击穿，加锁
        //只要是同一把锁，就能锁住需要这个锁的所有线程
        //(本地锁)1.synchronized(this),SpringBoot所有组件再容器中都是单例的。

        synchronized (this) {
            //竞争得到锁以后，应该再去缓存中确定一次，如果没有才需要继续查询
            return getDataFromDb();
        }
    }

    /**
     * TODO 加入缓存之后，很容易出现堆外内存溢出异常，需要之后排查
     *
     * @return 1.空结果缓存，解决缓存穿透
     * 2.设置过期时间（加随机值），解决缓存雪崩
     * 3.加锁，解决缓存击穿
     */
    @Override
    public Map<String, List<Catelog2Vo>> getCateLogJson() {
        //从redis缓存中拿出的缓存是json，需要转换成能用的对象【需要进行反序列化】

        //加入缓存
        String catelogJSON = redisTemplate.opsForValue().get("catelogJSON");
        if (StringUtils.isEmpty(catelogJSON)) {
            //缓存中没有,查询数据库
            Map<String, List<Catelog2Vo>> cateLogJsonFromDb = getCateLogJsonFromDbWithRedisLock();
            //将数据库结果转为json放入缓存，放在这会造成redis还没有存时，其他线程竞争到锁，判断没有缓存从而导致再次查数据库
//            String res = JSONObject.toJSONString(cateLogJsonFromDb);
//            redisTemplate.opsForValue().set("catelogJSON",res,1, TimeUnit.DAYS);
        }
        Map<String, List<Catelog2Vo>> res = JSON.parseObject(catelogJSON, new TypeReference<Map<String, List<Catelog2Vo>>>() {
        });
        return res;

    }


    private List<CategoryEntity> getParent_cid(List<CategoryEntity> categoryList, Long parentId) {
//        return baseMapper.selectList(new QueryWrapper<CategoryEntity>().eq("parent_cid", v.getCatId()));
        return categoryList.stream().filter(item -> item.getParentCid().equals(parentId)).collect(Collectors.toList());
    }

    //递归
    private List<Long> findParentPath(Long catelogId, List<Long> paths) {
        paths.add(catelogId);
        CategoryEntity ca = this.getById(catelogId);
        if (ca.getParentCid() != 0) {
            findParentPath(ca.getParentCid(), paths);
        }
        return paths;
    }

    private List<CategoryEntity> getChildrens(CategoryEntity root, List<CategoryEntity> all) {
        List<CategoryEntity> children = all.stream().filter(categoryEntity ->
                categoryEntity.getParentCid() == root.getCatId()
        ).map(categoryEntity -> {
            categoryEntity.setChildren(getChildrens(categoryEntity, all));
            return categoryEntity;
        }).sorted((menu1, menu2) -> {
            return (menu1.getSort() == null ? 0 : menu1.getSort()) - (menu2.getSort() == null ? 0 : menu2.getSort());
        }).collect(Collectors.toList());
        return children;
    }


    public static void main(String[] args) throws InterruptedException {
        ThreadPoolExecutor poolExecutor = new ThreadPoolExecutor(3, 100, 60, TimeUnit.MINUTES,
                new LinkedBlockingDeque<>(100),
                Executors.defaultThreadFactory(), new ThreadPoolExecutor.AbortPolicy());
        for (int i = 0; i < 6; i++) {
            poolExecutor.execute(()->{
                System.out.println("线程"+Thread.currentThread().getName()+"开始执行");
                try {
                    Thread.sleep(4000);
                } catch (InterruptedException e) {
                    e.printStackTrace();
                }
                System.out.println("线程"+Thread.currentThread().getName()+"执行完毕");
            });
        }
//        poolExecutor.shutdown();
//        System.out.println("线程池开始shutdown");
        //执行shutdown
        if (!poolExecutor.isShutdown()) {
            poolExecutor.shutdown();
            System.out.println("start shutdown ...");
            //等待执行结束
            poolExecutor.awaitTermination(2, TimeUnit.MINUTES);
            System.out.println("all thread over");
        }
    }
}